home *** CD-ROM | disk | FTP | other *** search
- object FrmOptions: TFrmOptions
- Left = 220
- Top = 129
- BorderStyle = bsDialog
- Caption = 'Options'
- ClientHeight = 310
- ClientWidth = 419
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object btnOK: TButton
- Left = 176
- Top = 280
- Width = 73
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- end
- object btnCancel: TButton
- Left = 256
- Top = 280
- Width = 73
- Height = 25
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 1
- end
- object tnbOptions: TTabbedNotebook
- Left = 8
- Top = 8
- Width = 401
- Height = 265
- TabFont.Charset = DEFAULT_CHARSET
- TabFont.Color = clBtnText
- TabFont.Height = -11
- TabFont.Name = 'MS Sans Serif'
- TabFont.Style = []
- ParentShowHint = False
- ShowHint = False
- TabOrder = 3
- object TTabPage
- Left = 4
- Top = 24
- Caption = 'General'
- object cbTipAssistant: TCheckBox
- Left = 216
- Top = 40
- Width = 161
- Height = 17
- Hint = 'Do you want to see the Tip Assistant every startup ?'
- Caption = 'Show &Tip Assistant at startup'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- end
- object cbNewDoc: TCheckBox
- Left = 8
- Top = 40
- Width = 163
- Height = 17
- Hint = 'Open a new document at startup ?'
- Caption = '&New document at startup'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- end
- object cbLowerCase: TCheckBox
- Left = 8
- Top = 96
- Width = 153
- Height = 17
- Hint = 'Indicates whether to insert all tags lowercase or not'
- Caption = 'Insert tags &lowercase'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- end
- object cbWordWrap: TCheckBox
- Left = 8
- Top = 16
- Width = 81
- Height = 17
- Hint = 'Indicates whether word wrap is disabled or enabled by default'
- Caption = '&Word wrap'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object cbEmptyAlt: TCheckBox
- Left = 8
- Top = 120
- Width = 249
- Height = 17
- Hint = 'Insert empty ALT attribute with images dropped from the filer ?'
- Caption = 'Insert empty &ALT attribute with dropped images'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 7
- end
- object cbMakeBackupCopies: TCheckBox
- Left = 216
- Top = 64
- Width = 129
- Height = 17
- Hint = 'Keep a backup copy of the document everytime you save it ?'
- Caption = 'Make &backup copies'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- end
- object cbSaveBeforePreview: TCheckBox
- Left = 8
- Top = 64
- Width = 137
- Height = 17
- Hint = 'Save file before launching browser'
- Caption = '&Save file before preview'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- end
- object cbChangeDirOnActivate: TCheckBox
- Left = 8
- Top = 144
- Width = 265
- Height = 17
- Hint =
- 'Change the directory shown in the Filer'#13'automatically to the loc' +
- 'ation of a document'#13'when activating it|Change the directory show' +
- 'n in the Filer automatically to the location of a document when ' +
- 'activating '
- Caption = 'Change &Filer directory upon activation of MDI child'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 8
- end
- object cbMaximizeChildrenUponCreation: TCheckBox
- Left = 8
- Top = 168
- Width = 217
- Height = 17
- Hint =
- 'Indicates whether to maximize the editing'#13'windows upon their cre' +
- 'ation or to leave them'#13'in normal size|'
- Caption = '&Maximize editing windows upon creation'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 9
- end
- object cbSyntaxHighlight: TCheckBox
- Left = 216
- Top = 16
- Width = 113
- Height = 17
- Hint = 'Enable syntax highlighting ?'
- Caption = 'Syntax highlighting'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- object cbAllowTextDragAndDrop: TCheckBox
- Left = 8
- Top = 192
- Width = 137
- Height = 17
- Hint = 'Allow moving text via drag and drop'
- Caption = 'Allow text drag and drop'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 10
- end
- end
- object TTabPage
- Left = 4
- Top = 24
- Caption = 'Toolbars'
- object cbStandard: TCheckBox
- Left = 8
- Top = 16
- Width = 113
- Height = 17
- Hint = 'Indicates whether to show the Standard Speedbar or not'
- Caption = '&Standard Speedbar'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object cbTags: TCheckBox
- Left = 8
- Top = 40
- Width = 121
- Height = 17
- Hint = 'Indicates whether to show the Tags Toolbar or not'
- Caption = 'HTML &Tags'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- object cbColors: TCheckBox
- Left = 8
- Top = 64
- Width = 97
- Height = 17
- Hint = 'Indicates whether to show the Color Speedbar or not'
- Caption = '&Color Speedbar'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- end
- object cbStatusLine: TCheckBox
- Left = 8
- Top = 88
- Width = 80
- Height = 17
- Hint = 'Indicates whether to show the Status Line or not'
- Caption = 'Status &Line'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- end
- end
- object TTabPage
- Left = 4
- Top = 24
- Caption = 'Browser'
- object lblBrowserPath: TLabel
- Left = 8
- Top = 16
- Width = 22
- Height = 13
- Caption = 'Path'
- FocusControl = EditBrowser
- end
- object EditBrowser: TEdit
- Left = 8
- Top = 32
- Width = 377
- Height = 21
- Hint = 'Path of browser to use with '#39'Preview'#39' funtion'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnChange = EditBrowserChange
- end
- object btnBrowse: TBitBtn
- Left = 296
- Top = 64
- Width = 89
- Height = 22
- Hint = 'Browse for a file on the local computer'
- Caption = 'B&rowse ...'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = btnBrowseClick
- end
- object cbBrowserIsNetscape: TCheckBox
- Left = 8
- Top = 88
- Width = 121
- Height = 17
- Hint =
- 'Check only if the specified browser really is'#13'a Netscape Navigat' +
- 'or or Communicator.'#13'Checking this box will enable DDE, so only'#13'o' +
- 'ne instance of the browser will be loaded.|'
- Caption = 'Browser is Netscape'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = cbBrowserIsNetscapeClick
- end
- object cbBrowserIsMSIE: TCheckBox
- Left = 8
- Top = 112
- Width = 153
- Height = 17
- Hint =
- 'Check only if the specified browser really is'#13'a Microsoft Intern' +
- 'et Explorer.'#13'Checking this box will enable DDE, so only'#13'one inst' +
- 'ance of the browser will be loaded.|'
- Caption = 'Browser is Internet Explorer'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = cbBrowserIsMSIEClick
- end
- object cbUseIE: TCheckBox
- Left = 8
- Top = 152
- Width = 209
- Height = 17
- Hint =
- 'Use Microsoft Internet Explorer as internal previewer on the Pow' +
- 'erPanel ? (Requires Internet Explorer 3 or higher installed)'
- Caption = 'Use Internet Explorer as internal browser'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- end
- end
- object TTabPage
- Left = 4
- Top = 24
- Caption = 'Help File'
- object lblExternalHelpFilePath: TLabel
- Left = 8
- Top = 16
- Width = 22
- Height = 13
- Caption = 'Path'
- FocusControl = EditExternalHelpFile
- end
- object lblCaption: TLabel
- Left = 8
- Top = 100
- Width = 36
- Height = 13
- Caption = 'Caption'
- FocusControl = EditCaption
- end
- object EditExternalHelpFile: TEdit
- Left = 8
- Top = 32
- Width = 377
- Height = 21
- Hint = 'The help file that will be called when F1 is pressed'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnChange = EditExternalHelpFileChange
- end
- object EditCaption: TEdit
- Left = 8
- Top = 116
- Width = 377
- Height = 21
- Hint =
- 'Text to appear in the help menu for the menu item that calls the' +
- ' help file'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- end
- object btnBrowse2: TBitBtn
- Left = 296
- Top = 64
- Width = 89
- Height = 22
- Caption = 'Browse ...'
- TabOrder = 1
- OnClick = btnBrowse2Click
- end
- end
- object TTabPage
- Left = 4
- Top = 24
- Caption = 'Filer'
- object Align: TLabel
- Left = 8
- Top = 8
- Width = 106
- Height = 13
- Caption = 'PowerPanel Alignment'
- end
- object lblStartUpFolder: TLabel
- Left = 8
- Top = 56
- Width = 172
- Height = 13
- Caption = '&Start up folder (leave blank for none)'
- FocusControl = EditStartUpFolder
- end
- object btnStartUpFolder: TSpeedButton
- Left = 360
- Top = 72
- Width = 21
- Height = 21
- Hint = 'Browse for a folder|'
- ParentShowHint = False
- ShowHint = True
- OnClick = btnStartUpFolderClick
- end
- object Label2: TLabel
- Left = 8
- Top = 152
- Width = 251
- Height = 13
- Caption = '&Extensions for documents (separate with semi-colons)'
- FocusControl = EditDocExtensions
- end
- object cbImages: TCheckBox
- Left = 8
- Top = 104
- Width = 161
- Height = 17
- Hint =
- 'use the <IMG> tag instead of <A> (only for images) when dragged ' +
- 'on an open document'
- Caption = 'Use <&IMG> tag with images'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- end
- object cbText: TCheckBox
- Left = 8
- Top = 128
- Width = 97
- Height = 17
- Hint =
- 'don'#39't use the <A> tag with text files, but insert their content ' +
- 'into the current file when dragged onto it'
- Caption = 'Insert &text files'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- end
- object rbLeft: TRadioButton
- Left = 120
- Top = 8
- Width = 57
- Height = 17
- Caption = '&Left'
- TabOrder = 0
- end
- object rbRight: TRadioButton
- Left = 120
- Top = 24
- Width = 57
- Height = 17
- Caption = '&Right'
- TabOrder = 1
- end
- object EditStartUpFolder: TEdit
- Left = 8
- Top = 72
- Width = 345
- Height = 21
- Hint =
- 'Enter the path you would like to be the'#13'current one upon startup' +
- '|Enter the path you would like to be the current one upon startu' +
- 'p'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- end
- object EditDocExtensions: TEdit
- Left = 8
- Top = 168
- Width = 377
- Height = 21
- Hint =
- 'When double-clicked in the filer, treat those file types as docu' +
- 'ments'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- end
- end
- object TTabPage
- Left = 4
- Top = 24
- Caption = 'Font'
- object Label1: TLabel
- Left = 8
- Top = 56
- Width = 41
- Height = 13
- Caption = 'Preview:'
- end
- object lblFont: TLabel
- Left = 8
- Top = 16
- Width = 21
- Height = 13
- Caption = '&Font'
- FocusControl = cbFont
- end
- object lblSize: TLabel
- Left = 240
- Top = 16
- Width = 20
- Height = 13
- Caption = '&Size'
- FocusControl = seSize
- end
- object Memo: TMemo
- Left = 8
- Top = 72
- Width = 377
- Height = 89
- Lines.Strings = (
- 'The quick brown fox jumps over the lazy dog.'
- 'This is what your text will look like.')
- TabOrder = 0
- end
- object seSize: TSpinEdit
- Left = 272
- Top = 16
- Width = 49
- Height = 22
- MaxValue = 100
- MinValue = 1
- TabOrder = 1
- Value = 10
- OnChange = seSizeChange
- end
- object cbFont: TComboBox
- Left = 48
- Top = 16
- Width = 145
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 2
- OnChange = cbFontChange
- end
- end
- object TTabPage
- Left = 4
- Top = 24
- Caption = 'TagComplete'
- object cbTagComplete: TCheckBox
- Left = 8
- Top = 8
- Width = 161
- Height = 17
- Hint = 'Indicates whether to enable or to disable TagComplete'
- Caption = 'Use the &TagComplete feature'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object cbSpace: TCheckBox
- Left = 8
- Top = 24
- Width = 153
- Height = 17
- Hint = 'Require the user to press the space bar to start TagComplete ?'
- Caption = 'Require &space bar pressed'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- object ListViewTagComplete: TListView
- Left = 8
- Top = 48
- Width = 377
- Height = 153
- Columns = <
- item
- Caption = 'Start tag'
- Width = 100
- end
- item
- Caption = 'End tag'
- Width = 100
- end>
- ColumnClick = False
- HotTrackStyles = []
- ReadOnly = True
- SortType = stBoth
- TabOrder = 2
- ViewStyle = vsReport
- end
- object btnNew: TButton
- Left = 152
- Top = 208
- Width = 75
- Height = 25
- Caption = '&New'
- TabOrder = 3
- OnClick = btnNewClick
- end
- object btnEdit: TButton
- Left = 232
- Top = 208
- Width = 75
- Height = 25
- Caption = '&Edit'
- TabOrder = 4
- OnClick = btnEditClick
- end
- object btnDelete: TButton
- Left = 312
- Top = 208
- Width = 75
- Height = 25
- Caption = '&Delete'
- TabOrder = 5
- OnClick = btnDeleteClick
- end
- end
- object TTabPage
- Left = 4
- Top = 24
- Caption = 'TagInfo'
- object lblTagInfoTime: TLabel
- Left = 8
- Top = 40
- Width = 23
- Height = 13
- Hint =
- 'The time the software waits until it activates'#13'the TagInfo feat' +
- 'ure|The time the software waits until it activates the TagInfo f' +
- 'eature'
- Caption = '&Time'
- FocusControl = seTagInfoTime
- ParentShowHint = False
- ShowHint = True
- end
- object cbTagInfo: TCheckBox
- Left = 8
- Top = 16
- Width = 137
- Height = 17
- Hint = 'Indicates whether to enable or to disable TagInfo'
- Caption = '&Use the TagInfo feature'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object seTagInfoTime: TSpinEdit
- Left = 40
- Top = 40
- Width = 57
- Height = 22
- Hint =
- 'The time the software waits until it activates'#13'the TagInfo featu' +
- 're|The time the software waits until it activates the TagInfo fe' +
- 'ature'
- MaxLength = 2
- MaxValue = 60
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- Value = 1
- end
- end
- object TTabPage
- Left = 4
- Top = 24
- Caption = 'Other'
- object lblAutoSave: TLabel
- Left = 8
- Top = 16
- Width = 72
- Height = 13
- Caption = ' &Autosave after'
- FocusControl = seMinutes
- end
- object lblMinutes: TLabel
- Left = 149
- Top = 16
- Width = 36
- Height = 13
- Caption = 'minutes'
- end
- object seMinutes: TSpinEdit
- Left = 88
- Top = 16
- Width = 49
- Height = 22
- Hint = 'enter 0 to disable autosaving'
- MaxValue = 1000
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Value = 0
- end
- object cbShowTooltips: TCheckBox
- Left = 8
- Top = 48
- Width = 97
- Height = 17
- Hint =
- 'Do you want those little tooltips to'#13'appear when the mouse curso' +
- 'r'#13'stays over a button for some time ?|Show tooltips ?'
- Caption = '&Show tooltips'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- end
- end
- object btnHelp: TButton
- Left = 336
- Top = 280
- Width = 75
- Height = 25
- Hint = 'Help on options'
- Caption = '&Help'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = btnHelpClick
- end
- object DlgBrowser: TOpenDialog
- DefaultExt = 'exe'
- FileName = '*.exe'
- Filter = 'Executables|*.exe'
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
- Title = 'Select a browser'
- Left = 48
- Top = 368
- end
- object DlgHelpFile: TOpenDialog
- DefaultExt = 'hlp'
- FileName = '*.hlp'
- Filter = 'Help files|*.hlp'
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
- Title = 'Select a help file'
- Left = 88
- Top = 368
- end
- object FolderBrowse: TFolderBrowse
- Title = 'Browse for folder to make active folder upon startup'
- Left = 128
- Top = 368
- end
- end
-